home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / utility / 100 / tutorpas.fra < prev    next >
Encoding:
Text File  |  1987-01-16  |  11.4 KB  |  312 lines
  1. 0660103030566
  2. 1TUTORIAL EN PASCAL2ième partie
  3. 2page # de 8
  4. 9[....................................................]
  5.  
  6. =================DEUXIEMELECONDE====================
  7.  
  8. à                         PASCAL
  9. Ç
  10.     ==============PARSERGEVAILLANCOURT==================
  11.  
  12. 
  13. Bonjouràtous!!
  14.  
  15.     Jesuisheureuxdevousrevenirenpleineformeaveccette
  16. deuxièmepartiedel'étudeenPascal.J'espèrequelapremière
  17. partievousaétéutileetquevospremiersprogrammesontété
  18. réalisésavecsuccès.Surtoutnevousprivezpasdemelaisserun
  19. messagesurnotreBBSsivousavezdesdifficultés,ilmefera
  20. plaisirdevousaidersipossible.Maistrèvedebavardageet
  21. commençonssansplustarderaveclesvariablestableaux.
  22.  
  23.  
  24. üVARIABLESTABLEAUXÇ
  25.     ==================
  26.  
  27.     Unevariabletableauestunevariablecontenantplusieurs
  28. valeurs,chacunedecelle-ciétantindicée(indexée).
  29.  
  30.     Supposonsquenousvoulonsemmagasinerlesnotesd'un
  31. étudiant.Aveccequenousconnaissonsdelaleçon1,nous
  32. devrionsécrireleprogrammesuivant:
  33.  
  34. àPROGRAMÇnoteà(INPUT);äÇ
  35. (*souvenonsnousquelesmotsenmajuscules/italiques
  36. sontdesmotsréservésauPascal*)
  37. àVARÇn1,n2,n3,n4,n5,n6,n7,n8:àINTEGER;Ç
  38.     (*supposonsquel'étudiantestévaluésur8notes*)
  39. àBEGINÇ
  40. àREADLNÇ(n1,n2,n3,n4,n5,n6,n7,n8);
  41. àEND.Ç
  42.  
  43.                (programme8)
  44.  
  45. Maisceciseraitbeaucoupplussimpleenseservantd'une
  46. variabletableau:
  47.  
  48. àPROGRAMÇnote2à(INPUT);Ç
  49.    à VARÇnotes:àARRAYÇ[1..8]àOFINTEGER;Ç
  50.     (*déclarationd'unevariabledetypetableau*)
  51.     i:àINTEGER;Ç(*indicedeboucle*)
  52.     àBEGINä
  53.     àFORÇi:=1àTOÇ8àDOREADLNÇ(notes[i]);
  54.     äEND.Ç
  55.  
  56.                     (programme9)
  57.  
  58.     Onremarqueraquel'indicedelaboucleàFORÇdevientaussi
  59. l'indicedutableau.
  60.  
  61.     Ladéclarationd'unevariabletableaudoittoujourssefaire
  62. selonlasyntaxesuivante:
  63.  
  64. äàARRAYä
  65. Ç|
  66. äà[ä
  67. Çl'étenduedutableau(typedel'indice)
  68. |
  69. äà]ä
  70. Ç|
  71. äàOFä
  72. Ç|
  73. typedelavariabletableau
  74.  
  75.                          (figure9)
  76.  
  77.        L'indiceindiquela"grandeur"dutableau.Dansnotre
  78. exemple    précédent,letableaupossède8"cases"numérotéesde
  79. 1à8.Cet    indicedoitêtrel'undestypessuivants:
  80.  
  81.     -SCALAIRE(voirplusbas)
  82.     -CARACTERE(àCHARÇ)
  83.     -BOOLEEN(àBOOLEANÇ)
  84.     -INTERVALLE
  85.  
  86.     LetypeINTERVALLEest,enfait,un"sous-type",commedans
  87. notreexemple,1..8estunintervalledutypeàINTEGER.ÇC'estle
  88. typeleplusutilisépourl'indiced'untableau.Ladéclaration
  89. d'untypeàintervallealaformesuivante:
  90.  
  91. constante
  92. |
  93. ..
  94. |
  95. constante
  96.  
  97.                          (figure10)
  98.  
  99.     Oncomprendraqu'uneintervallederéelsn'estpas
  100. acceptée puisqu'onpeutavoiruneinfinitédenombresréelsentre
  101. deuxautres.
  102.  
  103.     Lesconstantespeuventégalementêtredéfiniesdansles
  104. déclarationsdeconstantes.Exemple:
  105.  
  106.    à PROGRAMÇnote3à(INPUT);Ç
  107.    à CONSTÇmaxnote=8;
  108.    à VARÇnotes:àARRAYÇ[1..maxnote]àOFINTEGER;Ç
  109.     i:àINTEGER;Ç
  110.   à  BEGINÇ
  111.     àFORÇi:=1tomaxnoteàDOREADLNÇ(notes[i]);
  112.    à END.Ç
  113.  
  114.                     (programme10)
  115.  
  116. Onpeutaussidéclarerletypedel'indice:
  117.  
  118.    à PROGRAMÇnote4à(INPUT);Ç
  119.    à CONSTÇmaxnote=8;
  120. ä   à TYPEÇrange:1..maxnote;
  121. ä   à VARÇnotes:àARRAYÇ[range]àOFINTEGER;Ç
  122.     i:àINTEGER;Ç
  123.    à BEGINÇ
  124.     àFORÇi:=1àTOÇmaxnoteàDOREADLNÇ(notes[i]);
  125.    à END.Ç
  126.  
  127.                          (programme11)
  128.  
  129.     Alors,sidurantlasessionsuivante,lerésultatdechaque
  130. étudiantestcumulésur7notesaulieude8,laseulechoseque
  131. l'onauraàeffectuerestdechangerlavaleurdemaxnote.
  132.  
  133.     Quandautableau,ilpeutêtreden'importequeltype.Cela
  134. devientintéressantsinotrevariable,aulieud'êtreattribuéeà
  135. unseulétudiant,devaitcontenirlesnotesdetouslesétudiants
  136. delaclasse.Ainsi,letypedelavariabletableauseraitun
  137. autretableau.
  138.  
  139.    à PROGRAMÇclasseà(INPUT);Ç
  140. ä  à CONSTÇmaxnote=8;(*lenombredenotesparétudiant*)
  141.     maxetudiant=35;(*lenombred'étudiantspar
  142.                                classe*)
  143.    à TYPEÇnoterange:1..maxnote;
  144.     etudrange:1..maxetudiant;
  145.     unetud:àARRAYÇ[noterange]àOFINTEGER;Ç
  146.     class:àARRAYÇ[etudrange]àOFÇunetud;
  147.    à VARÇnotes:classe;(*variabledetypeclasseà
  148.                             2dimensions*)
  149.     i,j:àINTEGER;Ç(*indicedeboucle*)
  150.    à BEGINÇ
  151.     àFORÇi:=1àTOÇmaxetudiantàDOÇ
  152. àFORÇj:=1àTOÇmaxnoteàDOÇ
  153.     àREADLNÇ(notes[i,j]);
  154.    à END.Ç
  155.  
  156.                     (programme12)
  157.  
  158.     Noussommesenprésence,dansnotredernierprogramme,d'un
  159. tableauàdeuxdimensions.
  160.  
  161. "àARRAYÇ[type1]àOFARRAYÇ[type2]àOFÇtype3"estla
  162. mêmechoseque"àARRAYÇ[type1,type2]àOFÇtype3.
  163.  
  164.     OncomprenddoncquedansàREADLNÇ(notes[i,j])le"i"estle
  165. premierindice(premièredimension)tandisquele"j"estle
  166. deuxièmeindice(deuxièmedimension).Iln'yapasdelimitesau
  167. nombresdedimensions(1,2,3,4,etc).Seulementvotrecompilateur
  168. oulamémoiredisponibledel'ordinateurvouslimitera
  169. physiquement.Noteztoutefoisqu'ilesttrèsrarequel'ondoive
  170. seservird'untableaudeplusde3dimensions.
  171.  
  172.  
  173.    ü LESCHAINEDECARACTERESÇ
  174.     ========================
  175.  
  176.     Unechaînedecaractèresn'estautrechosequ'untableaude
  177. caractères.Exemple:
  178.  
  179.     àARRAYÇ[1..30]àOFCHARÇ
  180.  
  181. Danscetexemplel'onobtientunechaînede30caractères.
  182.  
  183.    à PROGRAMÇtonnomà(INPUT,OUTPUT);Ç
  184.    à CONSTÇstringlenght=30;
  185.     (*longueurmaximumdelachaînedecaracteres*)
  186.     àTYPEÇstring30à:ARRAYÇ[1..stringlenght]àOFCHAR;Ç
  187. ä   à VARÇnom:string30;
  188.    à BEGINÇ
  189. ä    àWRITELNÇ('Quelesttonnom?');
  190.     àREADLNÇ(nom);
  191.     àWRITELNÇ('Bonjour',nom);
  192.     àEND.  Ç
  194.                     (programme13)
  195.  
  196.     Dansl'ordinateur,uncaractèreoccupeunoctetdemémoire.
  197. Ainsi,dansl'exempleprécédent,lachaînedecaractèresoccupe
  198. l'espacede30octets(bytes).Ilestcependantpossiblede
  199. réduirelamémoireutiliséedemoitiéavecl'instructionàPACK.
  200. Ç
  201.     Cetteinstructionpermetdecompacteruncaractèreendemi
  202. octet,cequiépargnebeaucoupdemémoiredansletraitementd'un
  203. tableaudechaînedecaractères.Pourmieuxcomprendre,lisonsle
  204. programmesuivantquilitlesnotesdesétudiantsd'uneclasse
  205. dontlesnomsapparaîssentsuccessivementàl'écran.
  206.  
  207.  
  208.    à PROGRAMÇclasse2à(INPUT,OUTPUT);Ç
  209. ä   à CONSTÇmaxnote=8;
  210.     maxetudiant=35;
  211.    à TYPEÇnoterange:1..maxnote;
  212.     etudrange:1..maxetudiant;
  213.     string30:àPACKEDARRAYÇ[1..30]àOFCHAR;Ç
  214.     unetud:àARRAYÇ[noterange]ofàINTEGER;Ç
  215.    à VARäÇnotes:àARRAYÇ[etudrange]àOFINTEGER;Ç
  216.     (*tableaudenotes*)
  217.     noms:àARRAYÇ[etudrange]àOFÇstring30;
  218.     (*tableaudesnoms*)
  219.     i,j:àINTEGER;Ç
  220. ä   à BEGINÇ
  221.     àFORÇi:=1àTOÇmaxetudiantàDOÇ
  222.     àBEGINä
  223. WRITEÇ(noms[i]);(*affichelenom*)
  224.     àFORÇj:=1àTOÇmaxnoteàDOÇ
  225.     àREADÇ(notes[i,j]);
  226.     (*litlesnotesdel'étudiant*)
  227.     àWRITELN;Ç(*retournelecurseuràlaligne
  228.                          suivante*)
  229.     àEND;Ç(*fori*)
  230.   à  END.Ç
  231.  
  232.    à                 Ç (programme14)
  233.  
  234.  
  235.    ü PACKetUNPACKÇ
  236.     ================
  237.  
  238.     Telquementionnéprécédemment,àPACKÇpermetdecompacterun
  239. tableau.Passeulementuntableaudecaractèresmaisaussides
  240. tableauxd'autrestypes.Enfait,untableaunoncompactéréserve
  241. aumoinsunoctetparvaleur,dépendemmentdutypedutableau.
  242. S'ils'agitd'untableaudebooléensnoncompacté,ilréserveraun
  243. octetparvaleuralorsqu'enréalitéseullepremierbitde
  244. l'octet(ilya8bitsdansunoctet)estsignificatif.Sion
  245. compactecetableau,onpourraainsimettre8valeursbooléennes
  246. dansunseuloctet,d'oùéconomiedeprèsde90%delamémoire
  247. occupée.
  248.  
  249.     àUNPACKÇ,quandàlui,faitlecontrairedeàPACKÇ,c'est-à-
  250. direqu'avecuntableaucompacté,illerendàsonétatnormal.
  251.  
  252.     Pourcompacteruntableau,ilfautemployerlasyntaxe
  253. suivante:
  254.  
  255.    à PACKÇ(a,b,c);
  256.  
  257.     où"a"estlavariabletableau;
  258.     "b"estlerésultat(variabletableaucompactée);
  259. "c" est un entier indiquant l'indice de la première
  260. composantede"a"intervenantdansl'opération.
  261.  
  262.     Pourdécompacteruntableau,ilfaututiliserlasyntaxe
  263. suivante:
  264.  
  265.     àUNPACKÇ(c,a,b);
  266.  
  267.     Où"a","b",et"c"ontlamêmesignificationquedansla
  268. syntaxedeàPACK.
  269. Ç
  270.  
  271.     üLETYPESCALAIREÇ
  272.     ================
  273.  
  274.     Pardéfinition,letypescalaireestl'ensembledesvaleurs
  275. ordonnéesquepeutassumerunevariabledecetype.
  276.  
  277.     Parexemple,letypeàINTEGERÇestuntypescalaire,letypeà
  278. CHARÇl'estégalement.LetypeàREALÇ,lui,nel'estpas.
  279.  
  280.     Leprogrammeurpeutdéfinirsesproprestypesscalaires.
  281. Chaquenouveautypepossèdeunidentificateuretilestdéfinipar
  282. unelistedevaleursquepeutprendreunevariabledecetype.
  283.  
  284.     Exemple:àTYPEÇetatcivil = (celibataire, marie,divorce,
  285.                               separe,veuf);
  286.  
  287.     Etl'onpeutainsidéclarerunevariabledecetype:
  288.  
  289.     àVARÇalain:etatcivil;
  290.  
  291.     Lavariablealainpourradésormaisprendren'importequelle
  292. valeurdutypeetatcivil,soitcelibataire,marie,divorce,separe
  293. ouveuf.
  294.  
  295.     Exemple:alain:=celibataire;
  296.  
  297.     Lesvaleurscontenuesdanslalistedéfinissantuntype
  298. scalairenesontpasdeschaînesdecaractères.Ilestimpossible
  299. deleslireoudelesimprimer.Parcontre,cesvaleurspeuvent
  300. intervenirdansdesexpressionsetpeuventêtrecomparées.
  301.  
  302.     Iln'estpaspossiblequ'unmêmevaleurpuissefigurerdans
  303. deuxtypesdifférents.
  304.  
  305.     Exemple:àTYPEÇprenoms=(julie,serge,alain,denise);
  306.                tissus=(coton,laine,serge);
  307.  
  308.     Lestypesscalairescréésparleprogrammeurserventà
  309. rapprocherlelangagedeprogrammationdulangagehumain.
  310.  
  311.     D'icilaprochaine,portezvousbien,etbonneprogrammation!
  312.